home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus Special 16
/
AMIGAplus Sonderheft 16 (1998)(ICP)(DE)[!].iso
/
pd
/
anwendungen
/
amicad
/
arexx_english
/
lupe.amicad
< prev
next >
Wrap
Text File
|
1998-08-09
|
424b
|
23 lines
/* Lupe.AmiCAD, Chez Corbin, 18 Janvier 1998, version 1.00e */
port=address()
address command
'run' "c:Lupe F R GS JAS"
do i=1 to 2000
i=i+1
end
address(port)
'STOFRONT'
exit
syntax:
address (port)
erreur=RC
'MESSAGE("Script Lupe.AmiCAD :"+CHR(10)+"Syntax error"+CHR(10)+"in line 'SIGL'"+CHR(10)+"'errortext(erreur)'")'
exit
error:
address (port)
'MESSAGE("Script Lupe.AmiCAD :"+CHR(10)+"Error in line 'SIGL'")'
exit